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Chapter One 
Data 


By the end of this chapter, students will be able to: 


+ 


+t + + + + + 


List the different types of data. 

Choose the appropriate (Data type). 
Declarevariables. 

Declareconstants. 

To clarify concept of assignment statement. 
Assign values for variables. 


Set priorities for implementation of the arithmetic operations. 
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PREFACE 


Dear student, we previously studied in first term how to: 


e design a program’s interface of an application using (visual basic .NET)language. 

e insert and adjust properties of controls using properties window in designmode. 

e deal with Code Window and Event Procedures through which the Program user can enter values 
of data with different types as shown in figure(1-1). 
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Figure (1-1) User Interface and data entered 
Notethefollowing: (c's 2-201 2/12/7-64)-5),aredatavaluesofdifferenttypeswhere; 
The Name: represents a Text 
Birthdate:represents a Date 
Type: represents a Boolean value 
The number of family members: represents a numeric value 


On entering these data, it is temporarily stored in the computer memory (RAM), and to deal with 
these data we must assign a name and a type to it in memory, the type depending on the nature of 
the data element stored. 


1-1 Data Types 

Visual Basic.Net Language provides many data types, which allow the user to store input 
values from the user, or values resulting from the execution of instructions and commands of the 
program. 


Some Data Types provided by (Visual Basic.Net) Language are: 


1- Numeric DataTypes: 
a- Integer Numeric Types (declared by: Byte- Short — Integer -Long). 
b- Non-Integer Numeric Types (decimal) (declared by: Double- Single —Decimal). 
2- Character Data Types (declared by: String — Char). 
3- Miscellaneous Data Types are those data that do not fall under the Numeric or the character 
types (such as: Object — Date —Boolean). 
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DEAR STUDENT, PLEASE NOTICE THAT; 
Each classification of Data Type has more than onetype. 
Each data type occupies a storage space in the memory: for example, the integer data type 
occupies 4 bytes of memorystorage. 
e Each data type has a range of values (minimum value and maximum value); for example, the 
range of values the data type (Byte) starts with ‘0’ and ends with‘255’. 


1-2 Constants & Variables 
1-2-1 Constants 

They are places reserved in (RAM) that have data types; on declaring them, name and 
data types are determined for them. They take a fixed value and do not change during the 
progress of the program, such as: some mathematical constants like a, or some of the 
constants in physics like gravity acceleration, the speed of light and the speed of sound .etc. 


Naming rules of Constants & Variables 


On naming constants and variables preferably name expressing its purpose so that: 

1. Variable names must begin with a letter or underscore(_). 

2. Variable names should not contain symbols or special characters (e.g.: ?,*,/, -, +,-etc.). 

3. Do not use reserved words (Visual Basic.NET Language Keywords) such as (single, Dim, As). 


Notice:It also must be the choice of the appropriate type of each of the constants and variables - 
which had been clarified in data types to commensurate with the nature of the data to bestored. 


Declaring Constants 


Use the (Const) in the declaration of the constants in the language of the VB.NET, as 
illustrated in the following syntax: 


Const Constant name As DataType = Value 


where:- 

Const: decleration command about constants 
Constant_Name: the name of the constant. 

Data type : the type of data stored in the constant . 

Value : the constant value that stored in the declared constant . 


Examples 
"=StringAsC_NameConstéy)eJ!_»asigy stag" © 


Meaning of code: the constant (C_Name) was declared, of data type (String) and, its text value 
"S; jag pasds¢/l"isassignedduringthedeclaration. 


e Const pi As Single = 22 / 7 OR Const pi as signle=3.14 


Meaning of code: the constant (pi) was declared, of data type (Single) and, its numeric value 
22/7 or 3.14 is assigned during the declaration. 


e Const BirthDate As Date =#1/25/2011# 
omplete: 
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The constant (----------------- ) was declared in memory, of datatype(---------------- ) and, thevalue 


DEAR STUDENT, PLEASE NOTICE; 


e The double quotes "" "" are used if the value of constant is a stringvalue. 
e The hashes # # are used if the value of constant is date ortime. 


Exercise (1-1) Declaring Constants: 

Dear student, with the help of your teacher, to prepare a program using VB.NET language that 
receives a numeric value for the radius of a circle, and its circumference and area is calculated when 
you press the ''Command button". 

Note that: area of a circle = 712 and the circumference of a circle = 27r where: r represents the 
radius, 2 = 22/7, do the following: 
(1) design a form window as shown in figure(1-2): 
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Figure (1-2) User interface to be designed 
(2) Then open the code window by pressing the button (F7) and, add the (Click) event procedure 
for (Button1,Button2) as illustrated in figure (1-3): 


g Public Class Form3 


z Private Sub Buttonl_Click (ByVal sender As Object, By‘ 
End Sub 


=l Private Sub Button2_Click (ByVal sender As Object, By’ 


End Sub 
-End Class 


Figure (1-3) adding Event Procedures to the Code Window 


DEAR STUDENT 


We will write the code required to calculate the Area of a circle using the Event Procedure 
(Button1_Click) and, the circumference of a circle using the Event Procedure (Button2_Click) 
and the result will be one ofthem. 
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(3) In the scope of the event procedure (Button1_Click), type the code that calculates the area of a 
circle, and display the output in label control tool (Label2) when you click on (Button1) as 
shown in(1-4): 

Private Sub Buttoni Click(ByVal sender A 
Dim Radius As Single 
Const pi As Single = 22 / 7 
Radius = TextBoxi.Text 
Label2.Text = pi * Radius ^ 2 
End Sub 


Figure (1-4) the code to calculate the Area of a circle 
We conclude from the code the following: 
e The variable (Radius) is declared and its type is a decimal number(Single). 
e The constant (Pi) is declared with assigning the value (22/7) toit. 
e The value entered in TextBox is assigned to the variable(Radius). 
e The result of expression (Pi * Radius ^ 2) is assigned to the text property of the control tool 
(Label2). 


(4) Run the program by clicking on start debugging icon or pressing (F5) key to perform (Start 


Debugging),thenweenterthevalueoftheRadiusand, weclickthebutton($c<3_);!4)!)asshown in 
figure(1-5). =al) ipl apes oas iF 
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Figure (1-5) calculation of the area bearing in mind its radius 


(5) Make sure of the output, which is obtained after running theprogram. 
DEAR STUDENT, in the same way, with the help of your colleagues and under the supervision of your teacher, 
write the code of (buttenZ) to calculate the circumference of a circle. 


Exercise (1-2) Specify the scope of declaration for Variables and Constants, 
Dear Student, There are levels to declare the constants and variables you should take care of, for 


example, if we add the code to calculate the circumference of a circle, as follows: 
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Private Sub Buttoni Click(ByVal sender As Obj 
——> Dim Radius As Single 
——~S> Const pi As Single = 22 / 7 
Radius = TextBoxi1.Text 
Label2.Text = pi * Radius ^ 2 
End Sub 


PriwName ‘Radius' is not declared. nder As Obj 


Radius = TextBoxi.Text 
Lab -Text = pi * Radius * 2 
End Sub 


Figure (1-6) the code of calculating the area and circumference of a circle 
An error message will appear that means that the variable (Radius) and the constant (pi) were 
not recognized, where it was declared in the procedure of command button (Button1), and thus we 
know that they are undefined in the procedure of command button ( Button2). 


And you can make sure of that from the yellow rectangle if you indicate your mouse to the 
variable (pi) in the second line, as shown in (1-6): 
The yellow rectangle appears when pointing with the mouse to the variable (Pi) in the second 


line as shown in figure (1-7): 
Private Sub Button2 Click(ByVal sender As Obj 


Radius = TextB 
Name 'pi' is not declared. 


Label2.Text = =) * Radius * 2 


End Sub 


Figure (1-7) Error Statement in theCode 
To solve this problem, we repeat the declaration of the variable (Radius) and the constant (Pi) in the 
scope of the Event Procedure (Button2_Click) as shown in figure(1-8). 
Private Sub Buttoni Click(ByVal sender As Object, 
Dim Radius As Single 
Const pi As Single = 22 / 7 
Radius = TextBox1.Text 
Label2.Text = pi * Radius ^ 2 
End Sub 


Private Sub Button2 Click(ByVal sender As Object, 
Dim Radius As Single 
Const pi As Single = 22 / 7 
Radius = TextBoxi.Text 
Label2.Text = pi * Radius * 2 
End Sub 


Figure (1-8) the code after the declaration of the variable (Radius) and the constant (Pi) 
Or we declare the variable (Radius) and constant (pi) on the level of class (Form3) and thus we do 


not need to declare them on the level of the event procedure for each of the command button 
(Button1) or (Button2), as shown in figure (1-9): 
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=] Public Class Form3 

Dim Radius As Single 

Const pi As Single = 22 / 7 

= Private Sub Buttoni Click(ByVal sender As 
Radius = TextBoxi.Text 

Label2.Text = pi * Radius ^ 2 

H End Sub 


E Private Sub Button2_Click (ByVal sender As 
Radius = TextBox1.Text 
Label2.Text = pi * Radius * 2 

|- End Sub 

LEnd Class 


Figure (1-9) the declaration of the variable (Radius) and constant (Pi) on the class level (Form3) 


When you run the program by pressing on F5 to do (Start Debugging), and enter a radius, we get the 
output, as shown in figure (1-10). 
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Figure (1-10) User Interface after using the buttons (Asbo 141) and, (a5 13) 
1-2-2 Variables 
Variables are reserved places in computer memory (RAM) declared and determined by its 
name and type (Data Type), and its value usually changes during the running of the program and the 
variable can take initial value, then value changes during the running of the program, such as: price 
of product - the value of the tax - the address of employee etc. .. All these data can be changed. 


Variables Declaration 


We use the Command (Dim) to declare a variable in VB.NET language, as shown in the following 
syntax: 


Dim Variable_Name As Data Type [= Initial Value] 


Where 

Dim: is the declaration of variables. 

Variable Name: is a variable name. 

Data Type: is the data type to be stored in the variable. 

Initial Value: is the initial value that is stored in the declared variable and this part is optional. 


Examples: 


Dim F_Name As String 


Code means: the declaration of a variable name as (F_Name) in memory, its type is (String). 


Dim Total_Price As Single 
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Code means: the declaration of variable its type (Single), name as (Total_Price) in memory. 


Dim Today As Date = #1/25/2011# 


(Complete) 
Code meaning: the declaration of variable with the type............c:eeeeeee , MAMEAS( ...... eee eee ) 
in memory, and the initial valueis(.............::cceceeeeeeeeeeeeeeees ) forit. 


Exercise (1-1) Variables Declaration: 
With the help of your colleagues, and und under the supervision of your teacher, write VB.NET code 
necessary to declare the variables we need to receive the data that the user entered through a form 
"new user registration form" by following these steps: 

1) Design a form window asfollows: 
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Figure (1-11) User interface to be designed 
2) Use the following table to declare variables , as shown in the table(1-1): 
captions of Control tools Data Type variable names 


mae 


Table (1-1) expected values entered from the user 
3) Add the (Event Procedure), also called (Event Handler) for the button (J44).by double- 
clicking onit. 
4) write the followingcode: 


3 pdhal pilose. 


Private Sub Buttonl Click(ByVal sen 
Dim U Name As String 
Dim U B D As Date 
Dim U Gender As Boolean 
Dim U C F As Integer 
End Sub 


Figure (1-12) Variables declaration 
1-3 Assignment statement 


It is assigning a value to a constant or variable. It is a statement that has two sides (right hand 
side and left hand side) separated by the assignment operator (=). It takes the value on the right side 
of the assignment operator (=) and stores it in the variable or constant on the left, as in the following 
example: 
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e Area =5 *3 
It is seen from the code that the result of multiplying two numbers (5 and.3) has been assigned to 
the variable" Area." 


operator*= 


Abstract value 


Variable The value of a A=5 
variable B=A 


Variabl The value of A =5 
Jiu Expression B=A+3*2 


Property DR the TextBox1.Text = "Egypt" 


Exercise (1-4) Assigning values to Variables 
Firstly, complete the table using the form window and the code of variables declaration: 


Private Sub Buttonl Click(ByVal sen = Se eee 
Dim U Name As String 
Dim U B D As Date oe ee 
Dim U Gender As Boolean carseat aa eee 
Dim U C F As Integer a SaaS 5S) sac 
End Sub a 
ae variable 
Control tool PERY names Assignment statement 
TextBoxl Text U_Name _Name = TextBox1.Text 
TextBox2 Text U_B_D _B_D = TextBox2.Text 


RadioButton1 Checked U_Gender _Gender = False 


U 
U 
U 
U 


TextBox3 Text U_CF _C_F = TextBox3.Text 


Secondly: write assigning statements, as shown in figure (1-13): 


Private Sub Buttoni_ Click(ByVal sender As Systen 
Dim U_Name As String 
Dim U_B_D As Date 
Dim U_Gender As Boolean 
Dim U_C F As Integer 


U_Name = TextBoxi.Text 

U_B_D = TextBox2 .Text 

If RadioButtoni.Checked = True Then 
U_Gender = True 

End If 

If RadioButtoni.Checked = Faise Then 
U_Gender = False 

End If 

U_C_F = TextBox3.Text 

End Sub 


Figure (1-13) Writing assigning statements 
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The property (checked) for control tool (radiobutton1) has been tested using the conditional statement 
(if) will be explained later, If the value of the property (checked) is (true) then the value "true" is 
assigned to the variable (u_gender) however, if the opposite, the value "false" is assigned to the 
variable (u_gender), 

Exercise (1-5); Use of Variables: 


To modify the form window to appear as follows, in order to display the values of variables in a label: 
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With the help of your colleagues and under the supervision of your teacher, follow these steps: 
(1) Add a control tool ''Label5"' asfollows: 
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Figure (1-14) control tool (Label) after adjusting its properties 
(2) Adjust the control properties tool Label 5 as shown in table (1-2) and the figure(1-14): 


| J 


Using the mouse pointer — or properties window or code 


Table (1-2) the values of properties of the Label control tool 
(3) Open the event procedure by pressing (D'Click) on the "Register"button. 
(4) Add the following line of code at the end of theprocedure: 


Me.Label5.Text = UserName & vbCrLf & UserBirthDate & vbCrLf & 
UserGender & vbCrLf&UserNoFamily As shown in (1-15): 
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Private Sub Buttoni Click(ByVal sender As System.Object, ByVal e As 5 
REM Sl pia ii gc gust! 
Dim UserName As String 
Dim UserBirthDate As Date 
Dim UserGender As Boolean 
Dim UserNoFamily As Integer 


REM St patie! Gigi ped pout 
UserName = Me.TextBox1.Text 
UserBirthDate = Me.TextBox2.Text 
If RadioButtoni.Checked = True Then 
UserGender = True 
Else 
UserGender = False 
End If 
UserNoFamily = Me.TextBox3.Text 


" Sl pitta ti Bis n e 
Me.Label5.Text = UserName vbCrLf & UserBirthDate & vbCrLf & _ 


UserGender & vbCrLf & UserNoFamily 
End Sub 


igure the declaration of variables and assigning their values with writing remarks 


The previous code is an assignment statement for a group of variables with data of controls in "mew 
user registration” form window, 
e "Me" expresses the current windowForm. 
e Separates each variable and the other by the concatenation symbol" &". 
e The reserved word (vbCrLf) is used to create a newline. 
e Use the symbol (_) to write on more than one line if the code line is too long so you can 
organize and facilitate the process of reading the(Code). 
e The programmer can use the command (Rem) in writing remarks that can be referred to 
within the code, it is notcompiled. 
(5) Run the program by pressing the button (F5) to do (StartDebugging). 
(6) Enter the registration form data, and then press the "record" button, as shown in(1-16): 
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Figure (1-16) the user interface after completing inputs 


1-4 Priority rules for Arithmetic operations (Operator Precedence) 


Dear student, we have performed assignment operations including assigning arithmetic expression 
For example: What is the final output of the variable A in the following expression?: 

A=2+3*4 

the correct answer is not 20, however (14) this is because there are priorities on performing 
calculations ; the multiplication was performed, then addition process after that. Thus we find, the 
priorities of performing calculations are: 


1. Applying the process inside the brackets from the inside to theoutside. 
2. Applying theexponent. 
3 Applying multiplication or division process from left to right, wherever comes first. 
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4. Finally, the Application of the addition or subtraction process from left to right, wherever 
comesfirst. 

It is imperative to investigate the accuracy on writing mathematical expressions, so as to avoid 
falling into a (Logical Errors). 


1-5 Errors 

Dear student, on writing a code, it is a must to abide by the rules of the programming language used; 
when you write the code, in order to avoid errors that may cause the error messages on writing a 
code or not executing of commands or getting the wrong results. The program does not run. 

There are three types of errors: 


1. Syntax Errors 
They are errors in the common syntax commands of the language, for example: 
e Din x AsSingle 


The variable (X) was declared but there is a mistake in writing the word (Dim) 


e Const x AsSingle 
The constant (X) was declared but, its value is not assigned during the declaration. 
This type of error is easy to detect because the (IDE) helps us as it does not allow any error of this 
type which displays the syntax of any command as you type it. 


2. Logic Errors 
Logic Error: it happens when we get incorrect results after executing the program because of the wrong formulating 
arithmetic or logic expressions. 


Example 


On calculating the area of a circle, we use the following code: 
Dim Radius As Single 

Const x As Single = 22/7 

Radius = TextBox1.Text 

Label2.Text = x + Radius ^ 2 


On running the program, it will not give any error messages, it will give the wrong result, because 
we used sign (+) instead of an asterisk (*). 


To overcome this type of error, you must review the written code, and test the program with data 
already validated, to be sure there are no errors of this type (Logic Error). 


3. Runtime Errors 


And these errors are discovered while running the program, for example when declaring a variable 
of type Byte and during the program running, a value that is less than or greater than the allowable 
range is given, i.e. less than (0) or greater than (255) so an error appears during the run, meaning 
that the value is out of range. 
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Questions 
Training:)1( 
Discuss with your colleagues and under the supervision of your teacher the next screen content, and the 
table: 


= 
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Name Text box Character Je lidar 
Date of birth Text box date 17-12-2005 
Number of family member Text box numeric 5 
gender Radio Button Logic (Boolean) female 
Training (2) 


Complete the table with using the following screen: 
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wal, O 


Sitting number — | sssssssssssss J esssseesssssssss o | oossssssesesoooe 
Student name = | sssssssssossesso | oosessossossosss | usssosesesooooss 
Total summation — | ssssssssssess | esssssssssssosss o | eossssssesessooe 
Student status: - - | ssssssesssissmss —— ~ | vissssssssssssss  ě | uwssideddsssssoe 
Student picture Picture Box Pictures Photo file 
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First; put a Tick (Y ) in front of the correct statement and a cross (*) in front of the wrong 
statement for each of the following sentences: 


NO. Question Answer 

1 | One of the advantages of VB.NET is dealing with different types of data. 

2 | One of disadvantage of VB.NET is dealing with different types of data. 

3 All the data entered into the VB.NET program language are stored temporarily in the 
computer memory. 

4 | All types of data saved in the memory occupy the same storage space. 

5 A good programmer is the one who improves the rationalization of storage space in the 
computer memory. 

6 | The value of the student’s total grades is classified within the integer data types. 

7 | The value of the student's name is classified in the Miscellaneous data types. 

8 The value of the student gender "male" or "female" is classified within the 
Miscellaneous data types "Boolean". 

9 | Image of a student can be classified within the character data types. 

10 The value of the employee's salary can be classified within non-integer numeric data 
types. 

11 Each data element stored in computer memory occupies a particular storage space and 
a particular range of values according to its datatype. 

12 The data element identifies the storage space it occupies in computer memory and 
knowing the minimum and the maximum for its value. 

13 The term variables in vb.net means stores in the computer memory, which has type and 
name. 

14 | DeclaringavariableinVB.NETmeansdeterminingitsnameanddatatype. 

15 The declaration of variables in the language VB.NET helps rationalize the use of the 
computer memory. 
Declaration of variables is a matter of formality, because VB.NET languages recognize 

16 : : i 
the variables and determine the type automatically. 

17 The following statement "Dim F_name As String" is to declare the name of a variable 
"String" and type "F_name". 

18 The following data element "Dim F_name As String" is to declare the name of a 
variable "F_name" and type "String." 

19 | The declaration statement for variables is determined by the variable name and type. 

20 The declaration statement for the variables is determined by the name, type and fixed 
value. 

21 "55City" variable name is a considered a wrong variable name because it begins with a 
number. 

22 | "55City" is considered a variable correct name. 

23 | "Name" is considered a correct variable name in event procedure level (enrichment). 

24 | "Name" is considered a correct variable name in formIclass level (enrichment) . 

25 | "Dim" is used to declare variables. 

26 | "Dim" is used to declare constants. 

27 | The command "Const" is used in the declaration of the variables. 

28 | The command "Const" is used in the declaration of the constants. 
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NO. Question Answer 


29 Constants in VB.NET language are stores of a computer memory which have the name 
and the value that does not change during the running of the program. 


Constants in VB.NET language are stores of a computer memory which have name 


0 and value can change during the running of the program. 


31 | The error in the result of any equation is a Syntax Error. 


32 | The error in the result of any equation is a Logical Error. 


33 | Error that appears while you run or execute a VB.NET program is called Syntax Error. 


34 | Error that appears during the execution of VB.NET program is Run time Error. 


The final value of the variable X after the execution the following equation 


= "X=34+2 * 4" is(11). 
36 The final value of the variable X after execution the following equation "X = 3 +2 * 4" 
is (20). 

Second: Select the appropriate answer to complete each of the following sentences: 

(1) The value of prices of desktop tools can beclassifiedas... ........... data. 
a(integer b(non-integer c( miscellaneous 
(2) The value of the names of the subjects can beclassifiedas .............. data. 
a)miscellaneous b)non-integer c)string 


(3) The type of data element temporarily stored in the computer memorydefines: 
a) storage space and the extent of itsvalue 
b) Name and storagespace 
c) Storage space and a storagevalue 


(4) The right syntax to declare Salary variable is............ 
a) Dim Salary As Integer b) Dim SalaryAsByte —c)Dim Salary AsDecimal 


(5) The right syntax to declare the city variable is .......... 
a) Dim City As String b) Dim CityAsByte c)Dim City AsDecimal 


(6) The right syntax to declare the variable name F_Name is .......... ; 
a) Dim F_NameAsInteger b)Dim F_NameAsString c)Dim F_Name AsDecimal 
(7) The right syntax to declare the variable Gender is .......... 
a) Dim GenderAsDecimal b)Dim GenderAsInteger c)Dim Gender AsBoolean 


(8) The right syntax to declare the variable name F_Name is ....... : 
a) Din F_Name As String b)Dim F_NameAsString c) Dim F_Name AsChar 


(9) The error that appears after running a program VB.NET language is called ........ 
a) SyntaxError b)logicalError c) RuntimeError 
b) 


(10) The error that appears while writing a code in a VB.NET language called......... 
a) SyntaxError b)LogicalError c)Run timeError 


(11) The error in the output result in language VB.NET code is called........... 
a) SyntaxError b)LogicalError c)Run timeError 


(12) The final output of the variable X for equation "X =3 + 2 * 4" is......... 
a) ll b) 24 c)20 


b) 
(13) The final output of the variable Y for the equation "Y = 16 - 12/4 + 2" is...... 
a) 3 b)11 c)15 
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(14) The declaration statement of a variable "Dim X As String", means the declaration about ...... 
a) A variable named X and type of characterString. 


b) Variable called string and its typeX. 
c) Unknown variable has no name and its typeString. 


(15) The correct statement to declare a non-integer variable named Y is ....... 
a) Dim YAsDecimal b) YAsDecimal c) Dim Y =Decimal 


(16) Choose the correct name of the variable "name of thestudent"': 
a) st_name b)stname c) Name** 


(17) Choose the correct name of the variable "address of theemployee": 
a) 5Cairo b)E Address c)(Address) 


(18) The names of the following variables are correct in level of class formlexcept: 
(enrichment) 


a) St_text b)Text c)_st_text 


(19) On declaration of a mathematical constant 7 , we use the code .......... 
a) Dim PiAsSingle b)Dim Pi As Single=3.14 c)Const Pi As Single =3.14 


(20) On the declaration of constant gravity acceleration, we use the code ....... 
a) Dim gAsSingle b)Const g As Single=9.81 c)Dim g As Single =9.81 


(21) The declaration of variable number of family members C_Family with initial value of 2is: 
a) Dim C_Family As Single =2 
b) Const C_Family As Integer =2 
c) Dim C_Family As Integer =2 
(22) If there is an error in the result of a rectangular area calculation in a program, this error is 
considered ..... 
a) SyntaxError — b)LogicalError c) Run timeError 


(23) The error message that appears when you write the code ''Dimension X As Byte", can be 
classified as ...... 


a) Syntax Error b)LogicalError c) Run timeError 
(24) The final output of the equation " Y = 12 -—2+4/2"is......... 
a) 12 b)7 c)9 
(25) The final output of the equation " Y = 12 — (2 + 4) / 2 "is........ 
a) 12 b)7 c)9 
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Chapter Two 
Branching 


By the end of this chapter, students will be able to: 


* Identify conditional Statement "If ... Then." 
+ Use "If... Then... Statement. 
* Use "if...then ... else" statement. 


+ Use "Select... Case" Statement. 
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PREFACE 


Dear students, we previously learned Flowcharts; where we need branching and executing a 
sequenceofstepsdepending ontheresultofconditionortheanswertoaquestion. 

You will find that writing the code of branching is just applying the algorithm with adherence 
to the general syntax rules used. To express branching programmatically, we use special 
statements or structures that will be demonstrated through the followingexercises. 


2-1 Branching using the statement "If... Then" 


If Conditional Expression Then 


Code 
End If 


The previous general syntax of "If .. Then " is conditional or branching statement, This means 
that if the conditional expression is true, the code will be carried out, then you will reach the end of 
the "If statement", there are more complex syntaxes for "If." Some of them will be displayed later. 


To clarify what is meant by "conditional expression", we find that it consists of three parts : logical 
operator preceded by an abstract value ,a value of a variable or constant or a result of a 
mathematical expression that is compared with an abstract value ,a value of a variable or constant or 
a result of a mathematical expression, if this condition is met, it means that the result of the 
conditional expression is "True" and a Specific code is executed, If the condition isn't met, it means 
that the result of the conditional expression is "False" and another code is executed, the following 
table illustrates someexamples: 


Example of Conditional Expression 
conditional After logical There are (6) logical expression | Before logical 
expression operator operator 
IfA>5 
fA<5 Abstracted value ne trade 
<> i 
kas Smaller than Or equal to <= Variable 
ae Variabl Greater than or equal > = pi 
IfB>=A T ae a ~ constant 
IfB=A+3*2 ae 
fC<oA—-3*2 a value from Not equal <> 
IfA^2 = B/C expression 


The figure (2-1) illustrates the code of "If... then" Equivalent to flowcharts. 


If X >= 50 Then 
MsgBox ("æt") 
End if 


Figure (2-1) a simplified example for "If.... then" 
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EXERCISE (2-1) 


Implement the following steps to create a program in which we enter student's score, then the message 
"successful" appears in the message box, if the score is greater than or equal to 50, when you click the 


button "Result", 


(1) Design the following form window as shown in (2-2): 


r 
a! Form1 


Figure ( 2-2) The form to be designed 


(2) Write down the following code guided by the flowchart as shown in schedule(2-1): 


Flowchart 


Code 


The (Code) is written in the 
eventprocedure (Click) for the 
command button (Button! ) 


Private Sub Buttonl Click: 


Dim x As Single 
x = Me. TextBoxl.Text 
If x >= 50 Then 
MsgBox ("a>") 
End If 


Table (2-1) flowchart and code for exercise (2-1) 


NOTICE: 


We can also use the following (algorithm) in typing program code: 


1 START 


3 IF X>=50THEN 


4 END 


2 ENTER THE DEGREEX 


3-1 PRINT “cali 


(3) Run the program by pressing(F5) 


(4) Entervaluessuchas(20,50,75)andclickthebutton(6¢ ;))ineachtime. 
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NOTICE: 


e When you enter any value less than 50, the Message Box does not appear because the result of 


the condition is (False), so the statement after (End if) which is (End Sub) will be executed; to 
terminate theprocedure. 


e This (If) statement can be written, in one line without writing (End if) asfollows: 


Private Sub Buttonl Click(ByVal send 


Dim x As Single 


x = Me.TextBoxl .Text 
<r: x >= 50 Then MsgBox ("gL") 
End Sub 


2-2 Branching statement using (If ..Then.. Else) 


This syntax is used if there is "Code1" that will be executed if the result of condition is "true", 
or another code "Code 2" is executed if the result of condition is "False". 


The syntax of (If... Then...Else) statement 
If Conditional ExpressionThen 

Code1 
Else 


< The code in case of True | 


code 2 <——— The code in case of False | 
End if 


Exercise (2-2) :Modify the previous code to display the word “|, “ in a MessageBox; if the degree is 
less than 50 as shown in table (2-2). 


The (Code) is typed in the (Click) 
event procedure for the command 
button (Button1 ) 


Din x As Single 
x = Me, TextBoxl. Text 


MsgBox ("uas 3") 


Table (2-2) Flowchart and the code typed for exercise (2-2) 
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NOTICE: 

1. An (Else) statement contains the block of code (statements that follow Else) which is executed if 
the result of the conditional expression in the (If) statement is(False). 

2. The (If) statement can be written, in one line without writing (End if) asfollows: 


Dim x As Single 
x = Me. TextBox1. Text 
If x >= 50 Then MsgBox ("g>") Else MsgBox ("s! j") 


The (If) statement in one line | 


Exercise (2-3) 

In the same way as previously mentioned; create a new project that receives a value stored in the 
variable (N) through a TextBox, and displays the message “.gasJ pA!) “ or “aad pl“ in a 
MessageBox as shown in table (2-3), 


a, The (Code) is written in the 
"(Click) event procedure" for 
yo 4 the command Button 
y Dim N As Long 
N = Me. TextBoxl. Text 
N 
divisible If N Mod 2 = 0 Then 


by2 MsgBox ("+5 ) piji") 


Else 
| 


MsgBox ("4s 0 ji pod jl ") 
End If 


Table (2-3) flowchart and code for exercise (2-3) 

We assigned the Value in text box to the variable (N), then the value of the variable (N) 
was tested, if it is divisible by 2 without a remainder through the conditional expression (N Mod 
2)=0, 

where the function (Mod) returns the remainder of dividing the variable (N) by 2, if the 
remainder of the division is equal to zero, this means the condition is (True), then a message 
"even number" appears in a message box, and if the remainder of the division is not equal to zero, 
this means that the condition is not met (False), and a message "odd number" appears in the 
message box. 
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2-3 Branching using (Select ...Case) 
"Select ... Case’ statement is used in Branching depends only on the value of one variable and 
there are many conditions, which reduces the code and makes it easier and clearer. 


The syntax of (Select ...Case) statement 


Select ...Case Variable 
Case value 


code 
Case value2 


code 
Case value3 


code 


Case else 
code 
End Select 


Exercise ( 2-4) : On entering the temperature through the TextBox (TextBox1) and then clicking the 
"test" button the phrase "above zero" or "zero" or “below button" is displayed through (Label2) if 
we try to draw a flowchart compatible with (Select ... Case) as illustrated in figure (2-4): 


Output Output Output" äs 
"ia" " yal) daj" ya!" 


Figure (2-4) the Flowchart when using (Select...Case) for exercise (2-4) 
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Figure (2-4) illustrates more than two possible paths (branches) out of the decision making 
symbol; which is a comparison that evaluates a question about the value of variable (D); and 
according to this value the branching of the code differs. 


The code becomes as follows: 
Private Sub Buttonl Click(ByVal sender As Syste 


Dim degree As Single 
Try 
degree = Me.TextBoxl1.Text 


Me .Label2.Text 
Case Is < 0 


Me .Label2.Text 
Case Is > 0 
Me .Label2.Text 
End Select 
Catch ex As Exception 
MsgBox ("sic Jė") 
Me . TextBoxl1 . Focus () 
Me .TextBoxl1.Text = "" 
End Try 


End Sub 


Using Try......Catch in previous code is enrichment — ask your teacher 
Exercise (2-5) Through your study in geography, you learned a lot of concepts such as the galaxy, the 
planet and the star ... etc., . Create a project containing a form as shown in figure (2-5): 


F Formi l : 
ComboBox1 —> ~ 45S! meli doi 


Os ge dary 63)! > Ys \s gue aod R anet 
TextBox1 a de 8 ey op Hy 


Figure (2-5) the User interface 
Required: 


Type the necessary code, so that on selecting one of the elements of a ComboBox, its 
definition appears in the TextBox.. 
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Instructions 


1. Set the value of the property (Multiline) for the (TextBox) to“true”. 

2. Add the following items (Galaxy - Planet-Moon-Star- Meteoroid - falling star) forthe 
(ComboBox) control through the property(Items). 

3. Type the code in the (SelectedIndexChanged) event procedure for the control (ComboBox) 
asfollows: 


Select Case ComboBox1.SelectediIndex 


Case 0 

TextBoxl.Text = "si gaily JUSSYl j pla) LUIA peat Qe Ejas Glens" 
Case 1 

TextBox1. Text = "dir oa pd pa Get diy l pry oF pd dehi Fy) ee Yy lep gim pe pur” 
Case 2 

TextBox1. Text = "duds LF bss}! pihia © gid ÉR Led a di dy nip oS gS Ger Lane pai pet pur" 
Case 3 

TextBox1.Text = "3 ji joy lip güm caplet t pit pur" 
Case 4 

TextBoxl.Text = "g pze! GIL) ASUS) dis Le Gite pee he pur" 
Case 5 


TextBox1. Text = "rips ples dine ole cba) p 6 ey pend! Uae UA od i he pyle pu” 


Case Else 
MsgBox ("put Wied! dai plait! ow") 
End Select 


DEAK STUDENT, NOTICE 

We have depended, in writing of the code, on the order of the elements 
within the tool (ComboBox) where the first item has an (index) 0, the second 
item has an (index) 1 and the third item has an (index) 2, ......and, so on. 


4. Execute the program by pressing the key(F5). 


5. Select any item from the combobox box and make sure of itsdefinition. 
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Questions 


(1) Answer the questions with the help of the followingcode: 
If X >= 50 Then 
MsgBox("'successful '') 
End if 


A- MessageBox is shown with the text "successful" when : 


(2) Answer the following questions using the following codeline: 
(msgboxThenx<Olfas 2221!(msgboxelse)qbu.ss2)!) 


A- Write the conditional expression in the preceding statement: 


(3) Answer the following questions with the help of the screen and the code in thetable:" 


Code screen 
Private Sub Buttonl Click) (5em s ad 
Dim x As Single = a Sal 
x = Me.TextBoxl.Text 
If x >= 50 Then 
MsgBox ("a2>l5") Coes 
End If 


End Sub 


A-The purpose of the program is: 0.0.0... eeseesceseeeeseceseeeeeeeeseecesaeceseseseeeesaeeenaeeeues 

B- The code is executed if the event ................... gogotan E A controltool. 
C-Type of variable X in the code 1S............:ceseeeeeeeteeeees : 

D- "Me." In the code refers tO .iiai.siassaseseasvessssassasoens : 

E- We input the value (50) in the text box, the result of the implementation of the code is: 


(4) Complete the following table with the required code, using the general syntax conditional 
statement "IF .. Then ..Else" 


If Conditional Expression, 
Then 
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Else 
Code 


End if 


So as to show a message box having the word " +a" if the value of thevariable 
"Country" is equal to the "Egypt" or message box having the word "Egypt" appears: 
No statement code 
Conditional expression - | nici Ralebinb ee eelen Seas bbe edna peneeene sewer esas 
Result of achieving the condition "True" | -psscsexendedexeevenesdwensbcnssedcaseeseasadecentes 
Result of not achieving the condition "False" | ssceuededeeendecsetessvabevsesseneasessieseewscsaes 


WiN | = 


(5 ) Answer the following questions with the help of the code: = 
Dim x As Single 
A. IfthevalueofX=76,theresultofexecutingthecodeis: ; 

x = Me. TextBox. Text 


If x >= 50 Then 
Seed aces encanto: MsgBox ("+i") 
C. Rewrite the code of "Block If" to appear on only oneline. Else 
ET E E MsgBox ("a1 )") 
End If 


(6) After studying the code, answer the followingquestions: 


Dim N As Long 
N = Me. TextBoxl, Text 


A-Modifythecodesothatthe "as vie s5"textappearsinalabel If N Mod 2 = 0 Then 
"Label2"and"ee)2>_"textappearsinalabel"Label2"instead of the a ae 
messagebox. Hagiox ("4 ) ppl") 

Else 
MsgBox ("oo i addi") 
B- Replace the type of variable "N" to be "Integer" End If ee 


(7) The following code receives any number of a TextBox, and stores it in a variable, and 
then tests its value. If the number is even or odd, a Messagebox appears showingthat. 


Required: Retype the code after discovering the errors and correcting them so that the result of 
its implementation is right. 


Dim X AsInteger 


N = Me.TextBox1.Text 


30 


If N Mod 2=0 
Aa) 
("MsgBoxElsec>sj 


("MsgBox g3 Å a") 


(8) After studying the following code, answer the followingquestions: 


Private Sub Buttonl Click(ByVal sender As Syste 


Dim degree As Single 

Try 
degree = Me.TextBoxl . Text 
Select Case degree 


Case 0 

Me .Label2.Text = "pàs" 
Case Is < 0 

Me .Label2.Text = " paji 
Case Is > 0 

Me .Label2.Text = " pal 


End Select 
Catch ex As Exception 
MsgBox ("ois Jeo!) 
Me .TextBoxl1 . Focus () 
Me .TextBoxl.Text = "" 
End Try 


End Sub 
Using Try......Catch in code is enrichment — ask your teacher 


(A) The purpose of the code is x idtocarccmcveetineiandvenWvemaveentieereayein 


(B) If you learn that: " Degree = -3" the text appears in the message box is: 


(C) The code is executed when the event................... occurs on control tool................ 


(D) Type of variable "Degree”: is 0.0... 


31/60 


Chapter Three 
Looping & Procedures 


By the end of this chapter, students will be able to: 
* Identify / clarify the concept of iterative loops. 


* Use (For.... Next) statement to execute ''Code" for undefined 
number of times. 


+ Use (Do.... Loop) statement to keep "code" running 
for undefined number of times. 


Declare the (Sub) procedure. 

Call the (Sub) procedure. 

Use (Parameters) when declaring a (Sub) procedure. 
Declare a Function. 


Call a Function. 


t + + + + + 


Differentiate between a Sub Procedure and a Function. 
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In the previous chapter, we have learned how to execute a specific code, based on a 


conditional expression. In this chapter, you will learn how to repeat a certain code for a 
number of times (which is called Loops) using (For... Next) and (Do While... loop). 


3-1 Using (for....next) statement 
It is one of the limited loop statements used when we want to repeat a code for 
specific number of time. 


General syntax for this statement 
For Variable = Start Value To End Value Step Add Value 


Code 
Next [Variable] 


Where: 

"Variable" is the name which represents the counter and its type must be numeric 
(integer or decimal). 

"Start Value" is the start value of the counter or the beginning of repetition is a numeric 
value. 

"End Value" is the value of the end of the counter and the end of the repetition is also a 
numeric value. 

"Add Value" is the increment value of the counter or value over the counter until it 
reaches the end value. 

"Code" is command or more to be replicated and be between the beginning of the loop 
(for) and its end (Next.( 


AN IMPORTANT NOTES: 

1. If the value of the increment is positive 1, it can be dispensed with writing Step Add 
Value, as the default value to increase the counter is positive1. 

2. Typing a variable name counter next to "Next" optional. 


DEAR STUDENT, You Will Be Able To Use This Statement Through The Following Graded 
Exercises. 


EXERCISE ( 3-1 ): 
Design the following form window, to have the numbers from 1; 3 displayed in the 
Messagebox on pressing the button "View numbers from 1 to 3", as shown in (3-1), 


Implementation steps: al Designed By: Fatma Abdallah Sie % 


YD) ge del uae 


Figure (3-1) the form required in practice (3-1) 


(1) Design the form window as in the 
followingfigure: 
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(2) Use the following table to understand the nature of the work program, and study the 
code with the help of your teacher as shown in table(3-1): 


Flow Chart 


Din M As Intege 
For M = 1 To 3 


MsqBox (M) 
Next 
End Sub 


Table (3-1) flowchart and code: practice (1-3) 
Tracking the code as shown in the table (3-2) 


Meaning of code Value of Variable (M) 


| For M=1 to 3 1 (starting value ) 
The counter M starts from 1 to 3 


Next M=1+1 (The increment of M with 1) 
The end of the loop where the program 
returns to "For statement” testing the is the value of M greater than the end value (the 

counter skip to the end value of the loop, | result is, False) 

if the counter value is less than or equal 

to the end value , the counter increases 

with the value of the increase and 
implements steps repetition. 


Next The increment of M with 1 (M=2+1) 


is the value of M greater than the end value (the 
result is, False) 


The same previous procedure 


Next The increment of M with 1 (M=M+1) 
The same previous procedure Is the value of M greater than the end value (the 
result is, true)? 
Exiting out of the loop iteration and 
implementation of the following commands 
Next, if necessary. 
Table (3-2) Tracking program code for exercise (3-1) 


34/60 


)3) Type the code in the event handler of the button "display numbers from 1 to 
3". 
)4) Run the program by pressing (F5), and then click the command button 
"View numbers from 1 to 3." 


NOTICE THAT you receive a msgbox that displays the number "1" and when you click the 
button (ok), another message box appears displaying the number "2" and so on till the value 
3, as shown in (3-2); 


r Ẹ 
printnumbers = printnumbers 
i 2 


Figure (3-2) the message box 
Exercise ( 3-2 ): 
Modify the code in the previous exercise -with the help of your teacher- to display the 


numbers from 1 to 3 in a TextBox: 
(1) Add a TextBox to the form with the name (TextBox1) as shown in(3-3). 


a Designed By: Fatma Abdallah Coe |e js) 
m) 

The name of o i, 

TextBox:TextBox1 


YD oe te oae 


Figure (3-3) the form to be designed for practice (3-2( 


(2) Modify the code to the printed numbers inside the TextBox asfollows: 
Private Sub Buttoni Click(ByVal sender As System.c 
Dim m As Integer 


For m= i To 3 
Me .TextBox1.Text = Me.TextBox1.Text & m Comme 


Next m 
End Sub 


NOTICE: 

1(The command within the iterative loop, which means assigning the value of the variable 
(M) to be concatenated with what is inside the TextBox, using the concatenating operator 
"&" to concatenate the two strings together. 


2) If you type the line referred to in this way: "me.TextBox1.text = m", we won't notice 
the change of the variable (M) value during implementation, but another value ,which is 
"3", will appear because the output displayed will be the last value as the output displaced 
is in the same place. 
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(3) Run theprogram. 

(4) Click the button "Show numbers from | to 3," and observe the appearance of the 
numbers in the text box, as shown in(3-4): 

[ iB. Designed By: Fatma Abdalah Wee meme Mmmm ete aE 


123 


YD) Ge ded pase 


K 


Figure (3-4) the form after clicking the button in runtime mode 
Improve the form of output 


)1( If you click the button "View numbers from 1 to 3" again, the numbers from 1 to 3 
are displayed every click, as shown in (3-5): 


123123 


Figure (3-5) numbers in the text box TextBox after clicking the button again. 


So, you can add the command (Me.TextBox1.Text = "") before the iterative loop to 
delete the contents of the text box (TextBox) before the implementation of the iterative 
loop. 


)2(Dear student, You can display numbers inside the Textbox so that each number is 
a new line by doing the following: 

Set the value of the property (Multiline) to (True) for control tool (TextBox1) to 
deal with multiple lines of text in a TextBox. 

Modify the code inside the loop by adding "Carriage Return" symbol "vbCrLf" 
key code asfollows: 


Private Sub Buttonl Click(ByVal sender As System.Object, ByV 


Dim m As Integer 
Me . TextBoxl. Text = "" Ga Delete the content of TextBox1 | 


For m= 1 To 3 
Me .TextBoxl1.Text = Me.TextBoxl.Text & n@ wore >) 
Next m 


End Sub P Á 


A string constant used to add carriage returd sybbol and new line feed 


vbCrLf=Visual Basic Carriage Return Line Feed 
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Run the program, then click the button "View numbers from 1 to 3" as shown in (3-6(: 
(Gi) Designed By: Fatma Abdallah SS) 


1 
2 


YD) oe de uae 


Figure (3-6) the emergence of the required numbers in multi lines 
On clicking the button more than once, the content of the TextBox will be deleted and 
numbers will be displayed again. 
Exercise (3-3) 
Use your experience from the two previous exercises to print the multiplication table of 3 in 
a (TextBox) with the help of the following code. 
Dim m, product As Integer 
Dim str As String 
Me. TextBoxl.Text = "" 
For m = 1 To 12 
str = 3 & "x" & m & "=" 
product = 3 * m 
Me.TextBoxl.Text = Me.TextBoxl.Text & str & product & vbCrLf 
Next m 
NOTICE: 
1 An integer numeric variable is declared with the name "product" to store the result of 
multiplying with every change in the value of the variable (M). 
2-A string variable is declared with the name" str" to store the shape of the multiplication 
statement so that we can get the results through the figure (3x1= or 3x2= etc) and so on 
as a string sequence with every change in the variable value" M". 
3-The value of the variable (str) is displayed, and then the concatenation operator "&" then 
the value of the variable (product) are displayed in the(TextBox). 
4- The code can be typed without the use of these variables asfollows: 


Dim m As Integer 
Me.TextBoxl.Text = "" 


For m = 1 To 12 N I Tr 


Me.TextBoxl.Text = Me.TextBoxl.Text & 3 & "x" & m & "=" & 3 * m & vbCrLf 
Next m 


Shape of multiplication | The result 


Run the program, and then press the button "View 3 multiplication table," to have the 
result of execution as shown the following figure (3-7): 
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Ss _ 
a9 Designed By: Fatma Abdallah ee is 


3x1=3 = 
3x2=6 
3x3=-9 
3x4=12 
3x5=15 
3x6=-18 
3x7=21 
3x8=24 
3x9=27 
3x10=30 
3x11=33 
3x12=36 = 


ld 


Figure (3-7) Showing table "3" multiplication 


m. 


Exercise (3-4) 


Develop the program in the previous exercise to display the multiplication table of any 


number; you enter in the (TextBox) as shown in figure (3-8), 
[E8 Designed By: Fatma Abdallah = i Sax) 


5x1=5 j 
Saah 5 albal cal Joie aby Jis 
5x3=15 

5x4=20 

5x5=25 

5x6=30 

5x7=35 

5x8=40 

5x9=45 

5x10=50 

5x11=55 


5x12=60 
nell Joe Uae 
| $ 


Figure (3-8) multiplication table for any number inserted into the TextBox. 
After the modification, the code will be as follows: 


Dim m, product, NUM As Integer 
Dim str As String 


NUM = Me.TextBox2.Text 


Me .TextBox1.Text = "" 
For m = 1 To 12 

str = NUM & "x"G ps "=" 

product = NUM 

Me .TextBox1.Text = Me.TextBoxi.Text & str & product & vbCrLf 
Next m 


NOTE THAT number 3 is replaced by the variable (num); which contains the value of the 
(TextBox). 

3-1-1 Control the start value, end value, and step-increment in the (For...Next) 
statement. 


We noticed in the previous exercises that the start value is always smaller than the end 
value, so the increase in the counter was a positive value as the default increment value is 
positive one, but we can determine the values of another increment after (Step), it can be 


an integer numeric value or decimal; positive or negative. The following table illustrates the 
different cases forthis: 
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No Example The code 
1 | To display the odd number For I = 1 To 10 Step 2 
from Ito 10 Me .TextBox1.Text = Me.TextBox1.Text & I & vbCrLf 
Next 
2 | To display the even numbers For I = 2 To 10 Step 2 
from 2 to 10 Me.TextBox1.Text = Me.TextBox1.Text & I & vbCrLf 
Next 
3 | To display the numbers that For I = 3 To 20 Step 3 
can be divided by 3 starting Me.TextBox1.Text = Me.TextBox1.Text & I & vbCrLf 
from 3 to 20 Next 
4 | To display even numbers in For I = 10 To 1 Step -2 
descending order from 10 to 1. Me. TextBox1.Text = Me.TextBoxl.Text & I & vbCrLf 
Next 
5 | Display numbers from 1.50to For I = 1.5 To 0.5 Step -0.05 
0.5 with decremented by 0.05 Me.TextBox1.Text = Me.TextBox1.Text & I & vbCrLf 
each time Next 
6 | To display the numbers from 1 For I = 1 To B Step C 
to the value of B at increasing Me.TextBox1.Text = Me.TextBox1.Text & I & vbCrLf 
value of C Next 


Table (3-3) a variety of examples for using "For ... Next" 


From the previous examples, we conclude that: 

1 . We can determine the rate of increment of the variable after (Step) and then type a 
numeric value or numericvariable. 

2. The rate of increment should be negative if the starting value is greater than the end 
value (example 4 and5). 

3. The starting value, the end value, or the increase rate can be a decimal number; in this 
case the loop variable type should be defined to accept decimals such as Single type 
(ExampleS5). 

4. The starting value, the end value, or the increase rate can be variable (Example6). 


3-2 The use of "Do while" 


We used the limited iterative statement "For ... Next" to execute a specific 
code several times, but sometimes you may want to repeat a certain code until a 
certain condition comes true or the code can be executed as long as the 
condition of the loop is true, thus there are other iterative statements such as the 
statement of "Do while ...loop". 

The statement ‘Do while ... loop' is used to repeat a specific code for a several 


times of an unknown end, but based on a specific condition, so they are useful if you 
do not know the number of iterationsemphatically. 


For example, the input of names can be repeated in the TextBox. We can get outof the 
repetitive loop “The input of names" the names on entering the word "End" forexample. 


The general syntax of this statement is: 
Do WhileConditionalExpression — xx. 4 


Code 
Loop 
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The code between the beginning of the loop "Do While" and its end will be 
implemented as long as the conditional expression is true. If the condition is not met for 
any reason, we get out of the iterative loop, and implement the code after the Loop if it 
exists. 


Exercise ( 3-5 ) 

Design a a project window as shown in the following figure to Enter a number in the 
TextBox „then click the Button “ åå sie , odd numbers are listed in the ListBox in an 
ascending order from one to the entered number, On clicking the button "" 494) sisi" , 
even numbers are listed in the ListBox in an ascending order from one to the entered 
number, As shown in the following figure (3-9): 


r 
eS Formi 


— ———<— 


Figure (3-9) user interface to display the odd and even numbers 
Discuss the codes in the following table with your colleagues; execute them under the 


supervision of your teacher. 


1 .The following programming code for executing an event "Click" related to "odd 
numbers," button in two methods: the first is by using the iterative statement "For ... 
Next," the second is by using the iterative statement "Do While ... Loop:" 


First method Second method 


Dim N, i As Integer 
N = TextBoxi1.Text 
ListBoxl1. ems ear () 


For i= 1 To N Step 2 
ListBox1.Items.Add(i) 
Next 


Under the supervision of your teacher, use your skills to modify what it required to 
execute that code as follows: 

(1) Display even numbers in your event handler related to "Even numbers". 

( 2 ) Display odd or even numbers arranged in an descending rather than an ascending 
order. 


Exercise (3-6): 

Design the program window, so that it receives a positive number, and displays the sum of 
the odd numbers (up to the number entered) in the tool "label3" on clicking the button: 
"gi pill alae! e gapa and displays the sum of the even number ( up to the number entered ) on 
clicking the button " 44 she! £ sapa " as shown in (3-10); 
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dr gpl sine Ene | | do pi) aiae Eee | 


Figure (3-10) and user interface to display the sum of odd and even numbers 


Use the following guidelines for implementing the program: 
(1) Thecodecanbeprogrammedintheclickeventprocedure.fotthebutton" ss. We segesalll"intwo 


methods, asfollows: 

First method 
Dim N, i, sum As Integer 
N = TextBox1. Text 


For i = 1 To N Step 2 
sum = sum + i 


Next 


Label3.Text = sum 


Second method 
Dim N, i, sum As Integer 
N = TextBoxi1. Text 


i = 1 

Do While i <= N 
sum = sum + i 
i = i + 2 

Loop 


Label3.Text = sum 


(2) Modify what is required in the previous code to display the sum of even numbers when 


you press the "total even numbersbutton". 
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Procedures 
PREFACE 


Dear Student, when you add a new form window, a new class is created as Form1. 
Within the scope of this class we declare: 
1- Event procedures. 


2-Variables. 
3-Constants. 
As shown in the following figure 3-11: 


g Public Class(Formi) 
| Di (coral) Ss Integer 
= Private a ace sender As System.Objec 
"10 5! 1 ge esi fact! gaye 
seo” ga Integer 
Labell.Text = "" 
For i= 1 To 10 Step 2 
Labeli.Text = Labeli.Text & ""&i 


Next 

H End Sub 

~ Private sanCiecsons CLER sender As System.Objec 
"10 gj) 1 GQ TFH! otacdt oo po 
Di As Integer 


Labeli.Text = "" 
For i = 2 To 10 Step 2 
Labeli.Text = Labeli.Text &€" "é&i 
Next 
E End Sub 


‘End Class 


Figure (3-11) the declared elements in the Code Window: 
We can notice the declaration of the following from the figure (3-11): 
1 ."Class" is under the name (Form1): 
2" Variables" are under the names (total, 1): 
3-"Event procedures" are under the name of (Button1_Click, Button2_Click(: 
When you run the program, the user interface is displayed as shown in Figure (3-12): 
Eja Sills sass yós ae 


a 


Label1 


Figure (3-12) user interface 
DEAR STUDENT, 
You can also declare what is so-called (Procedures); this declaration is done only once and 
then, you recall the procedures many times from anywhere in your program; which avoids 
code duplication in places where procedures are recalled. 
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3-3 Procedure 


A set of commands and instructions under a name, can be recalled by that 
name, so as to implement them, and create a (Sub) if we have a set of 
commands that are frequently used in more than one place in the class. 


These procedures in the language (VB.NET) are either sub procedure (Sub) that does not 
return a value, or a function that returns a value 


3-4 Declaration of a Sub Procedure 
When you create sub procedure, you should declare it by the following syntax: 


The general syntax for declaring Sub is: 


Sub Name (Parameters) 
Code 
End Sub 


Where: 

1 -"Name" reflects the name of theprocedure. 

2 -"Parameters" reflect the values that were used inside the procedure code that are 

used on recalling theprocedure. 

3-"Code" is a set of orders and instructions carried out on recalling the procedure 

(Sub). 

NOTICE: 

The Code typed within each event procedure for (Buttonl_Click) and (Button2_Click) is 
repeated; except for the starting value typed in each one; where the value in the (433!) 
button starts by (2), and in the (44!) button starts by (1) as shown in figure (3-11). 
Exercise (3-7) Declaring and calling a Procedure 


Dear student, use the Sub procedure to avoid code duplication as shown in figure (3-13) 


-= Public Class Formi 
Dim total As Integer 


= Private Sub Buttoni_Click(ByVal sender As System.Ob 


"19 


= 5 2 pasit of y= 
howOddOrEven Recalling a (Sub) Procedure | 


End Sub 


= Private Sub Button2 Click(ByVal sender As System.Ob 


s LO 2 4 pl laci ep 
howOddOrEven Recalling a (Sub) Procedure | 
End Sub 
L Sub“ShowOddOrEven | Declaring a (Sub) Procedure | 


Dim i As Integer 

Labeli.Text = "" 

For i= 1 To 10 Step 2 
Labeli.Text,= Labeli.Text € ""é&i 


Next 
L End Sub Code executed when yourecall 
the (Sub) procedure 
‘End Class 


Figure (3-13) declaring and Recalling a Procedure 
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In figure (3-13) we declared a procedure called (ShowOddOrEven) that contains the 
repeated code. The procedure is executed by typing its name in any other procedure 
within the class, such as typing its name in each of the event procedures 
(Button1_Click) and (Button2_Click). 


Notice: 

When testing the program, we find that both buttons, the (4 5) button and the (4444) 
button; when clicking any of them, they give the same result, because the starting value of 
the iteration (repetition) in both procedure has the same value 1. As shown in figure (3-14) 


and figure (3-15). 
("EE Häls gags! pepe a 


Figure ( 3-14) user interface 
Sub ShowOddOrEven () 


Dim i As Integer Starting value of the 
Labeli.Text = "" repetition 
For i (1) SO IU ep 2 
Labeli.Text = Labeli.Text & " "é&i 
Next 
End Sub 


Figure (3-15) a part of the code window 
So the Parameters should be used as shown in the following practice: 


Exercise (3-8) Declaring and using Parameters 


To solve the previous problem; the procedure (ShowOddOrEven) must receive the values 
(1) or (2) on recalling it .this value is used to specify whether the odd numbers will be 
displayed or the even numbers will be displayed. This is done by adding the variable 
(Start) that will be recalled later. as shown in figure (3-16) and figure(3-17). 


Sub ShowOddOrEven (ByVa (scary) As Integer) 
Dim i As Integer 
Labeli.Tex 
For i To 10 Step 

Labeli .Teme = Labeli.Text & " "Ei 


Declaring a Parameter 


Next 
End Sub 


Using this Parameter 
Figure (3-16) declaring a Parameter 
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In figure (3-16) a sub Procedure of the name (ShowOddOrEven) has been declared and a 
Parameter named (Start) has been also declared and used in the code to specify the 
starting value of the iteration (repetition), accordingly it displays odd or even numbers. 


Private Sub Buttonl Click(ByVal sender ? 
"10 J! 1 ge 429 5iI! otacdt oa pe 
ShowOddOrEven (1) 

End Sub 


Setting an Argument value 


3 


Private Sub Button2 Cli (ByVal sender zł 
"10 i! 1 ge Gee Mi otacdt gaye 
ShowOddOrEven (2) 

End Sub 


Figure (3-17) Passing Arguments to Procedures 


In figure (3-17) the sub Procedure (ShowOddOrEven) has been recalled twice, the value 
of (1) on displaying odd numbers, and other value (2) on displaying even numbers, this is 
called (Argument)value. 

NOTICE: 

On testing the program, we find that both buttons, the (<>>!) button and the ( 
24) button when clicked, give different results as shown in figure (3-18) and 
figure(3-19). 
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Figure(3-19)onclickingthe(2_4!)button 
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NOTICE: 
e In the procedure declaration, we can use more than oneParameter. 
e When the procedure is recalled, we determine values of the outside procedure called 
(Argument). 


3-4 Declaration of a Function 
Function is a set of commands under a particular name that should express its 
task. It is applied to Parameters and returns a value. 


FunctionName (Parameters) As DataType Code 
Return Value 
End Function 


Where: 


1- "Name" expresses the name of thefunction. 
2- "Datatype" identifies the type of the returned value of thefunction. 
3- "Parameters" represents the parameters that will be used in thecode. 
4- "Code" is a set of commands and instructions that will be executed on calling the 
Function. 
5- "Value" is the returned value by thefunction. 
Exercise (3-9) to calculate the sum of two numbers 
Dear student, with the help of your teacher do the following: 


1- Design a Form window as shown in figure (3-20). 


r 


2s |B| a axl gt og 


JoVI sal 


sl dal 


Figure (3-20) User interface 


2- Open the Code Window, press (F7) then type the Code as shown in figure (3-21). 
Public Class Form5 
Function Sum (ByVal First As Single, ByVal Second As Single) As Single 
Dim total As Single 
total = First + Second 
Return total 
End Function 
End Class 


Figure (3-21) the code window where the function (sum) is declared 
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DEAK STUDENT, NOTICE: 
| We declared the (Sum) Function; of Data Type (Single) that receives two values (First 
andSecond). 
| A variable named "total" has been declared of type (Single) for which we allocated the 
sum of the two values (First) and (Second), to return the value (total) using(Return). 


3- Create an event procedure for Button1, and then type the code as shown in figure (3- 
22). 
Private Sub Buttonl_ Click (ByVal sender As 
Dim x As Single = TextBox1.Text 
Dim y As Single = TextBox2.Text 
Label4.Text = Sum(x, y) 
End Sub 


Figure (3-22) recalling the (sum) function 
DEAR STUDENT, NOTICE THE FOLLOWING: 
The variables (x) and (y) have been declared and the user input values were assigned to 
each one of them in (TextBox). and to display the summation, the value of the (Sum) 
function has been assigned to the Property (Text) of (Label4) control after receiving the 
two values (x), (y). 


DEAR STUDENT, REMEMBER THAT; 
e Variables: We can assign values for the Variables; during the declaration and the 
execution of the Program instructions, as well as using these storedvalues. 


e Constants: We should assign values to Constants; during the declaration only, as 
well as using these storedvalues. 


e Functions: It is recalled and returns a value in the light of the values assigned to the 
function. 


4- Press (F5) key to execute the program, then enter the values as shown in figure(3-23). 
(Ls [ela gen wt a 


yq Joel al 


YW sl al 


Laima 


Figure (3-23) User interface 
From the previous example, it's clear that: 


we can declare aFunction. 

we can determine itsParameters. 

we can specify the Functiontype. 

we can type the code within the scope of thisFunction. 
we can return a value using the Returnstatement. 


a oe ES 
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Questions 


(1) Answer the questions with the help of the followingcode: 

A-The code is executed when you press ......... oncontroltool......... ( complete) 
B- "Dim" is used to declare (variable — constant) with type 
C-The variable name used in the iterative loop is: .............. 
D. The starting value of the iterativeloopis.............. , theend 
value is .... and the value of increment is 


Private Sub Buttonl Click (By’ 
Dim M As Intege 


E. Implementation of the iterative loop stops when the value of For M=1 To 3 
variable M reaches. ............ MsgBox (M) 
F- The code that is repeated is. ........eeeeeeeeeees = 


Next 

(2) Answer the following questions with the help of the End Sub 
followingcode,: 
Private Sub But_Repeat_Click (ByVal sender As System.Object, 

Dim m As Integer 

Me.Lebel1.Text = "" 

For m=5 To 9 Step2 

Me.labell.Text = Me.label1.Text & m & vbCrLf 


Next m 
sae pede eaadevaweeeatecracesecesener (The required in line number 7) 
MsgBox("' soule ali sl") 
End Sub 
(A) The purpose of the codeis: 
(B) the code is executed when the event ................... occurs on the control tool.............. 
(C) to declare the variable m ,the command.................cceeccceeeeeeeeeees isused. 


(D) The loop statement used is 
JE) The code to be repeated is ccc.ccncorsredcaniewiieesdeattenainads 

(F) The purpose of the use of concatenation operator & in a the statement 
(Me.labell.Text = Me.labell.Text & m) is. wo... ee! 

(G) Type the necessary code to display the final value of the variable M after the 
execution of the iterative loop in a messagebox: 


(3) Answer the following questions with the help of thecode: 


Dim n, product As Integer 
Dim str As String 
Me.TextBox1.Text = "" 
For n = 1 To 12 
Str=3&"x"&n&"=" 
product = 3 * n 
Me. TextBox1.Text = Me. TextBox1.Text & str & 
product & vbCrLf 
Next n 
End Sub 


48/60 


B. The purpose of the code (Dim str As String) is to declare a string variable named str. 
(True - false) 

C- The purpose of the code (product = 3 * n) is assigning the result of multiplying 3 by 

the variable n to the variable product. (True -false) 

D- The purpose of the code (product = 3 * n) is assigning the result of multiplying 3 by 

the variable product to the variable n. (True -false) 

E. The purpose of thecode: 


Me.TextBox1.Text = Me.TextBox1.Text & str & product & vbCrLf 


Is assigning the value of the string variable "str" and the value of the variable 
"product" as a value for the property "text" for TextBox1. (True -false) 
F. The purpose of the code part "vbCrLf" is to transition to a new line. (Truefalse) 


(4) The following code is for typing a multiplication table of number 4 from 1 to 
12. 
Required: Modify the code to have a multiplication table of ( 7 ) so that the result 
will be in a TextBox. 

7x5=35 

7x7=49 

7 x 9 =63 

7x11=77 


Dim n, product As Integer 
Dim str As String 
Me.TextBox1.Text = "" 
For n = 1 To 12 
Str=4&"x"&n&"=" 
product =4*n 
Me. TextBox1.Text = Me. TextBox1.Text & str & 
product & vbCrLf 
Next n 
End sub 


(5 )The purpose of the following code is to type a multiplication table of ( 9 ) 
by the numbers from 1 to 10. 
Required: Correct the four errors in the code, until we get the correct result of the code 


execution in the table. 


Dim n, product As String 
Dim str As String 
Me.TextBox1.Text = "" 


For n= 1 To 10 Step -1 wo 
Str=9& "x" &n& "=" 


product = 9 + n 
Me. TextBox1.Text = Me. TextBox1.Text & str & 
product & vbCrLf 
Next str 
End Sub 
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No. Wrong code The code after correction 


(6) The following table contains the code and the form window to print a 
multiplication table for any number from 1to12. 
Required: In the following table, complete using the necessary code to get the 
correct output after running the program . 


asi Talesi 


-= 7 
E Designed By: Fatma Abdalah oaks 


Dill t, peee NM As Integer = 
Din str As String so 


S15 
5x4=20 
ii 
S= 
iS 


MUM = Me, TextBox?, Text 


5x8=40 
$945 
5x10°50 
Sx11-55 


51260 
ull Js uae 


Me, TextBoxl. Text = "" 
For m = 1 To 
oe MM E "x" Go G "et 


product = NOM # pete 
Me. TextBoxl Text = Me, TextBoxl Text & str & product & vbCrLf 


(7) With the help of the code, answer the followingquestions: 
For I = 1 To B Step ec 
Me .TextBox1.Text = Me.TextBoxl1.Text & I & vbCrLf 
Next 
A= THE pürpöse OF the code? cccisiinidanaiiniGRnnuadimmnsnbauanaiins 
B- The name of the counter variable: ..............ccccecssseseseeeeeeeeeeeeees 
C- The iterative loop begins with the value: ............ccceesseceesseeeesneeeenees 
D- The iterative loop ends with the value: .........eeessesesssessseesseresssserrsseesee 
E- the value of the increment of counter: ................::ceee 
F- The purpose of vbCrLf is: o.oo 
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ChapterThree Looping &Procedures 


)8) The following code is used to input a positive number, and when you press the 
"odd numbers" button, odd numbers from 1 to the positive number that has been 
entered is typed, and if you press, ''Even numbers" button , odd numbers from 1 
to the positive number that has been entered is typed. 


39S) Cad alle icity 

Dim N, 1 As Integer fom crx) 
N = TextBox1.Text | 
ListBoxi.Items.Clear () wary oss Leal | 
a =i 
Do While i <= N fone | 

ListBoxl1 . Items .Add (i) aS 

i = i + 2 re 
Loop 


Required: 
(1) The loop statement in the program is: ............eseeeeeeeseeeeeeeeeeeeees 
(2) The purpose of the code (I = I + 2) in the line before the last is: oo... eee 


(4( Select the right choice to determine the nature of each part of the line of code 
components: 


LiezttBhoxw1 . I Cems . Clear tt} 


(9) The purpose of the following code is entering a positive number, then the sum of 
odd numbers is displayed in textbox. 
Dim N, 1, sum As Integer 


(A)The purpose of the code N = TextBox1.Text is N = TextBoxi.Text 


i = 1 
eesosooooososooooooooooooooooooooo T Wh = 1 = — H 
(C) The loop statement will be implemented as longas = r "a 
sum = sum + 1 
cosocosesosocoseoossooosooosooosooosooo = 3 
(D) The sum of odd numbers is displayed in the text box when ae an 


we get to a number larger than the positive one that has been 
entered in thecontrol tool ...............e and that wasassigned 
to the Variable,..csssssascsicannscante 
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(10) Tick (“in front of the correct statement and a sign (*) in front of the wrong 
one for each of the followingphrase: 


No Question Answer l 
1 The procedure is a set of commands and instructions that are repeated for specified (+) 
number of times. 
2 The procedure is a set of commands and instructions under a certain name, and C) 
when you recall this name, these commands and instruction are implemented. 
3 The purpose of the use of procedures is repeating typing a specific code several (+) 
times in the program. 
4 When we have a specific code that we want to be replicated in more than one place C) 
in the class, we use the "Function" 
5 The group of Commands and instructions that are placed under a name, when we () 
implement them, they return a value. We call this action "procedure ". 
6 The group of Commands and instructions that are placed under a name, when we C) 
implement them, they return a value. We call this action "Function ". 
7 When we have a specific code that we want to be replicated in more than one place C) 
in the class, we use the "Procedure". 
8 Parameters are used to receive values from outside the procedure on recalling it. ( ) 
9 When you recall a procedure with the name Taxes (0.05), the value between the C) 
brackets is called Argument. 
10 When you call a procedure with the name Taxes (0.05), the word taxes is called (+) 
Argument. 
11 The declaration of a function starts with (Sub) and ends with (End Sub). ( ) 
12 The declaration of a function starts with (Function) and ends with (End Function). ( ) 
13 We resort to the use of the Function if our code results in a value we need. ( ) 
14 We resort to the use of the Procedure if our code results in a value we need. ( ) 
15 The Function is a set of commands and instructions with a specific name that can C) 
take Parameters, and return a parameter. 
16 The Function is a set of commands and instructions with a specific name that can C) 
take values, and return a value. 
17 The demerit of the language of VB.Net is that it allows he programmer to declare () 
other functions and procedures prepared by him. 


(11) With the help of the following code, complete the followingtable: 
Sub ShowOddOrEven (ByVal Start As Integer) 
Dim i As Integer 
Labell.Text = "" 
For i = Start To 10 Step 2 
Labeli.Text = Labeli.Text & ""é&i 


Next 
End Sub 
No Question Answer 
1 Procedure Name a auaeececcaeeeeecesetecees 


Parameter was declared with the name... and type | wee eeeeeeeseeesseeesteeeeees 


3 The iterative loop starts from the value .... J] sssssssesesssessessesseseesee 

4 The increment value of the iterative loop equals J che eeeeseeeeesneeeetteeeees 

5 When calling the procedure to execute the code | sesssssesssssessrresrerese 
starting from the value ........ 

5 Feedback from the function value. fh eeteeeseeeesseeesseeneeee 
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With the help of the code, complete the followingtable: 


Code 
Return RRR 


End Function 


Function XXX (ByVal YYY As Integer, ByVal ZZZ As Integer) As Single 


No Required Answer 
1 Function mame j= j f ¥eisuesurugsuseanesamalaeaiens 
2 Type of returned value of the function | eee eee e eee ee eee ees 
3 Parameter value that will be used in the code | o....e eee cece eee ee ees 
4 Returned value of the function | bttetssetceseevigeassexeecece 
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Questions 


(1) Answer the questions with the help of the followingcode: 
A-The code is executed when you press ......... oncontroltool......... (Complete) 
B- "Dim" is used to declare (variable — constant) with type 
C-The variable name used in the iterative loop is: .............. 

D. The starting value of the iterativeloopis............. , theend 
value is .... And the value of increment is ....... 

E. Implementation of the iterative loop stops when the value of 
variable Mreaches.............. 


Private Sub Buttonl Click (By’ 

Dim M As Intege 

For M=1 To 3 
MsgBox (M) 


Next 

(2) Answer the following questions with the help of the End Sub 
followingcode,: 
Private Sub But_Repeat_Click (ByVal sender As System.Object, 

Dim m As Integer 

Me.Lebell1.Text = "" 

For m = 5 To 9 Step2 

Me.labell.Text = Me.labell.Text & m & vbCrLf 


Next m 
eae EEES (The required in line number 7) 
MsgBox(" sowe etn") 
End Sub 
(A) The purpose of the codeis: 
(B) The code is executed when the event ................... occurs on the controltool.............. 
(C) To declare the variable m,the command ..............ccceecceeeece secon isused. 


(D) The loop statement used is 
JE) The code to be repeated is ........ 0... cece ccc e cece eee eee eees 

(F) The purpose of the use of concatenation operator & in a statement (Me.labell.Text = 
Me. label] .Text & m) iS. ........cccceeeeeeeeeee! 


(G) Type the necessary code to display the final value of the variable M after the execution of the 
iterative loop in a messagebox: 


(3) Answer the following questions with the help of thecode: 


B. The purpose of the code (Dim str As String) is to declare a string variable named str. 
(True - false) 

C- The purpose of the code (product = 3 * n) is assigning the result of multiplying 3 bythe 

variable n to the variable product. (True -false) 

D- The purpose of the code (product = 3 * n) is assigning the result of multiplying 3 bythe 

variable product to the variable n. (True -false) 

E. The purpose of thecode: 


Me.TextBox1.Text = Me.TextBox1.Text & str & product & vbCrLf 


is assigning the value of the string variable "str" and the value of the variable "product" as a 
value for the property "text" for TextBox1. (True - false) 
F. The purpose of the code part "vbCrLf" is to transition to a new line. (Truefalse( 


(4) The following code is for typing a multiplication table of number 4 from 1 to 12. 
Required: Modify the code to have a multiplication table of (7) so that the result will be ina 
TextBox. 
7 x 5=35 
7 x 7 =49 
7 x 9 =63 
7x11=77 


Dim n, product As Integer 
Dim str As String 
Me.TextBox1.Text = "" 
For n=1 To 12 
Sr=4&"xK"&n&"=" 
product = 4 *n 
Me. TextBox1.Text = Me. TextBox1.Text & str & 
product & vbCrLf 
Next n 
End sub 


(5) The purpose of the following code is to type a multiplication table of (9 ) bythe 
numbers from 1 to10. 
Required: Correct the four errors in the code, until we get the correct result of the code execution 


in the table. 


Dim n, product As String 
Dim str As String 
Me.TextBox1.Text = "" 


For n= 1 To 10 Step -1 >a) 
Str=9&"x"&n&"=" 


product =9+n 
Me. TextBox1.Text = Me. TextBox1.Text & str & 
product & vbCrLf 


Wrong code 


The code after correction 


(6) The following table contains the code and the form window to print a multiplication table 
for any number from 1to12. 
Required: In the following table, complete using the necessary code to get the correct output 
after running the program . 


39S) Tausisi 
P E Denei Dy rea A = El) 
Din Ml, peee NUM As Integer - 
, , = 5 ghd dd 
Din str As String ses 
5x4=20 
5x5=25 | 
NM = Me, TextBox?, Text a 
5x8=40 
5x9=45 
Me. TextBoxl Text = " ss 
5x12-60 
oot MM E "x" On g "et 
product = NOM + mete 


Me, TextBox], Text = Me, TextBoxl. Text & str & product & vbCrLf 


(7) With the help of the code, answer the followingquestions: 


For I = 


1 To B Step C 


Me .TextBoxl1.Text = Me.TextBox1.Text & I & vberLt 


Next 


B- The name of the counter variable..........cc eee ceeeceecesseeceeeeeeeeeees : 


C- The iterative loop begins with the value 


D- The iterative loop ends with the valuic..... 0... .eceeceeseeeseceteceneeeneeeeeeees 
E- The value of the increment of countet...............cee 
F- The purpose of vbCrLf is....... eee 


)8) The following code is used to input a positive number, and when you press the "odd 
numbers" button, odd numbers from 1 to the positive number that has been entered is 
typed, and if you press, "Even numbers" button , odd numbers from 1 to the positive 
number that has been entered is typed. 


34$ Zau lidé 

Dim N, 1 As Integer = =e 
N = Tex tBorl . Text — 
ListBox1 .Items .Clear () wary ale Jal 
i= 1 
Do While i «= N | | dap sissi 

List Boxi . Items .Add{i) — 

i = i + 2 [eusi | 
Loop 


Required: 


(4(Select the right choice to determine the nature of each part of the line of code components: 
ListBox i . Ltems . Clear  {} 
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(9) The purpose of the following code is entering a positive number, then the sum ofodd 
numbers is displayed in textbox. 


Dim N, i, sum As Integer 
(A)The purpose of the code N = TextBox1.Text TextBoxl .Text 
EAT 


(C) The loop statement will be implemented as long ae 


(D) The sum of odd numbers is displayed in the text box when 
we get to a number larger than the positive one that has been 
entered in thecontrol tool ...............e and that wasassigned 
to the Varia Dle cdeiencoxetiuas : 


(10) Tick (v^) in front of the correct statement and a sign (*) in front of the wrong one for 
each of the followingphrase: 


No Question Answer 
1 The procedure is a set of commands and instructions that are repeated for specified C) 
number of times. 
2 The procedure is a set of commands and instructions under a certain name, and 3 
when you recall this name, these commands and instruction are implemented. 
3 The purpose of the use of procedures is repeating typing a specific code several C) 
times in the program. 
4 When we have a specific code that we want to be replicated in more than one place C) 
in the class, we use the "Function" 
5 The group of Commands and instructions that are placed under a name, when we C3 
implement them, they return a value. We call this action "procedure ". 
6 The group of Commands and instructions that are placed under a name, when we E 
implement them, they return a value. We call this action "Function ". 
7 When we have a specific code that we want to be replicated in more than one place a 
in the class, we use the "Procedure". 
8 Parameters are used to receive values from outside the procedure on recalling it. ( ) 
9 When you recall a procedure with the name Taxes (0.05), the value between the C) 
brackets is called Argument. 
10 When you call a procedure with the name Taxes (0.05), the word taxes is called (+) 
Argument. 
11 The declaration of a function starts with (Sub) and ends with (End Sub). ( ) 
12 The declaration of a function starts with (Function) and ends with (End Function). ( ) 
13 We resort to the use of the Function if our code results in a value we need. ( ) 
14 We resort to the use of the Procedure if our code results in a value we need. ( ) 
15 The Function is a set of commands and instructions with a specific name that can C) 
take Parameters, and return a parameter. 
16 The Function is a set of commands and instructions with a specific name that can C) 
take values, and return a value. 
17 The demerit of the language of VB.Net is that it allows he programmer to declare 
other functions and procedures prepared by him. (C) 


(11) With the help of the following code, complete the followingtable: 


Sub ShowOddOrEven (ByVal Start As Integer) 


Dim i As Integer 
Label1l.Text = "" 
For i = Start To 10 Step 2 


Labeli.Text = Labeli.Text & ""&i 
Next 
End Sub 
No Question Answer 
1 Procedure Name = _ _  _ «ssi nesressresseeeesseressesssees 
2 Parameter was declared with the name... and type J  seesssssssssssessessseseeese 
3 The iterative loop starts from the value .... |  sesssesseessesseesseesesssee 
4 The increment value of the iterative loop equals J ch eeeeesteeeeesteeeenteeteees 
5 When calling the procedure to execute the code f aussesssssersssressesessees 


starting from the value ........ 


Feedback from the function value. 


(12) With the help of the code, complete the followingtable: 


Single Code 


Return RRR 


End Function 


Function XXX (ByVal YYY As Integer, ByVal ZZZ As Integer) As 


No Required Answ 
er 
1 Function name = f huaseeseeserserrerserrerserer: 
2 Type of returned value of the function | oo... eee eee ence eee eee 
3 Parameter value that will be used inthe ss ... eee cece eee cece ees 
code 
4 Returned value of the function |... 


Chapter Four 
Cyber bullying 


By the end of this chapter, students will be able to: 


+ Define cyber bullying. 

* Determine the means of cyber bullying. 

+ Distinguish between cyber bullying forms. 

æ Follow the correct procedure to face cyber bullying. 


+ Ask for help from individuals and organizations responsible for 
protection when exposed to cyber bullying. 


+ Mention organizations and institutes responsible for protection when 
exposed to cyber bullying. 


The ethics of dealing with the internet with all the means of information and communication of 
topical interest to individuals, communities and nations, so, in this chapter, we seek to raise 
awareness among students and our children the dangers of dealing with the internet, and provide 
them with some information and skills necessary to raise their degree of personal safety with respect 
to online cyber bullying. 


Through the internet, we can learn ... entertain ....communicate ... talk ... but There are many 
risks that we can be exposed to, including: 

e getting wronginformation. 

e falling prey to some of the aggressors across modes of electroniccommunication. 

e violation ofprivacy. 

e identitytheft. 

e getting our account stolen (on the social networking sites like Facebook oremail). 

e Subjecting our system to the risk of infection by viruses or spyware, or software piracy andothers. 


The definition of cyber bullying: 
Cyber bullying is a deliberate aggressive behavior from one person to another through 

electronic modes of communication. 
Firstly: The forms of cyber bullying: 

1. Harassment 
annoyance 
embarrassment 
intimidation 
threat 
Blackmailing 

7 Ete, 
Secondly: The Electronic Media 
Electronic media is a technology used by the electronic aggressor, and they are various including 
the following: 

1. Email. 
Forums. 
InstantMessage. 
Facebook. 
Blogger. 
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Thirdly: Forms of Cyber Bullying 
Forms of cyber bullying include: 
1. Anonymity: 
It is the use of pseudonyms (aliases) to hide e-aggressor's identity for impunity. 
2. Harassment: 
It is aggressive messages directed against one or more persons. 
3. Cyberstalking: 
It is a form of electronic harassment where the aggressor frequently traces and chases a 
particular person in all electronic media. 
4. Flaming: 
It is a publication of hostile and vulgar words against one or more through a media and 
electronic communication. 


5. Outing: 
It is a dissemination of information about a specific person or more abusively. 
6. Exclusion: 


It is to ignore one or more persons through the electronic media. 
7. Cyber threats: 
It is an email or e-message carrying a threat and intimidation to one or more persons. 


Fourthly: How to protect yourself from Cyber bullying? 
By following the safe use of the internet as follows: 


1- Don't share your password withanyone. 
2-Make a password that is difficult to predict. 
3-Don't publish (post) any privatedata. 


4- Avoid deleting Cyber bullyingmessages. 


5- Don't interview anyone you know via the internet 

6- Be careful! Don't send any electronic message when you are angry. 
7-Inform your parents with what annoy you when you use theinternet. 
8-The download of software from the internet should be done under 


the supervision of your teacher or yourparents. 


Everyday situations that show the importance of using the internet safely: 
]- Amro said to Yasmeen "I want to send a message to a friend but I don't have an e-mailaccount. 
Can you give me your user name and password to be able to send this message?" 


In_your opinion, what would you do? 
The answer: Don't share your password with anyone. 


2- Amrocreatedhisowne-mailaccount. Yasmeentriedtodeducehispasswordbytryinghisname and year 
of birth. Finally, she managed to open hisaccount. 
In your opinion, what's the mistake Amr made and how to avoid it? 


Answer: Amro chose a password easily deduced, so to avoid it he must choose the word 
with a high degree of difficulty. It must contain numbers, letters and special characters, 
and more than eight characters, and must be changed each period of time. 


3- Ramy subscribed to one of the social networking sites (Facebook) and published some private 
data including family photos with daily activities. A hacker used this information in stealing 
Ramy'sfamily. 

In your opinion, what should Ramy have done? Is there any harm he can face because of that? 


The answer: Don't publish any private data; Of course, he will have a lot of harm such as 


exposure to libel, blackmail or identity theft as a result of the occurrence of family photos in 
the hands of irresponsible people. 


4- A student complained to his teacher that his colleague cursed (insulted) him in an email 
message, the teacher asked him to read this message, the student replied that he had deleted the 
message, the teacher said to him, "You lost convictionevidence". 

In your opinion what should this student have done? 


Avoid deleting cyber bullying messages. 


5- Amr said to his father, "I have known someone in a chat room, and he would like to meetme." 
In your opinion, what was his father's reply? 


The answer: He warned his son very much of meeting strangers he knew via the internet. | 


6- A big argument occurred in the dialogue between Amr and Yasmin through a social networking 
site or a chat room; Amr became very angry and sent a message of intimidation and threat to 
Yasmin. 

What is your opinion of Amro's behaviour? 


The answer: It was an act of haste, and he should have followed the rules of safe use of the 
internet, "Be careful of sending an email when you are angry". 


7- Amr used the internet in the work of some of the school activities in collaboration with his 
colleagues, and noticed that when he used it, he receives instant messages in the inductance 
programs chat that were offensive to him, so he thought about moving away from the use of the 
internet to avoid abuse and to defendhimself. 


The answer: It was a negative act, and he should have asked for help from his father, older 


brother or computer teacher to help him to face the abuse positively. 


8- Yasmin used to download any programs from all the sites she visited on the Internet. This 
infected her computer with viruses andspyware. 
Do you agree to download any programs via unknown internet sources? 


Answer: No, I do not: but she should have made sure of these programs and their sources 


and followed intellectual property rights to these programs, and consulted the people of 
experience (her colleagues or computer teachers, for example). 


Extra information 
Related topics that you can search for (the ones you have already studied) are: 


Revealing identity 
Firewall 
Secretcodes 
Asking forhelp. 
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Questions 


The first question: Tick (v^) in front of the correct statement and a sign (*) in front of the 
wrong one for each of the following phrase: 


No Question Answer 
1 Cyber bullying is a deliberately aggressive behavior, using electronic media for 
harassment, annoyance, disturbance, intimidation or threatening others . C ) 
2 | Cyber bullying is done through electronic means, such as social networking sites. ( ) 
3 | Stealthy-mail is considered a form of Cyber bullying. ( ) 
4 | Harassment and the threat are of the most important electronic means used in 
Cyber bulling. 4 
5 | Harassment and blackmailing are forms cyber bulling. ( ) 
6 | Stealing the person's account in the social networking sites or email is one of the 
risks that we may be exposed to through such media. i 
7 | Social networking sites help to meet new people you like to see to develop social 
relationships. C) 
8 | In line with the rules of safe use. you should put an easy password passage, for (+) 
your private e-mail, in order to be able to remember, 
9 | E-exception means following a particular person in all means of electronic 
communication. ©) 
10 | Electronic prosecution is intended to send an e-mail carrying a threat and holiday 
for one or more persons. ©) 
The second question: Complete the following table explaining your opinion of each of the 
following words: 
No Situation Your opinion in the light 
of the rules of safe use 
1 Putting a password that's easy to deduce ( ) 
Someone published his real name, address and telephone 
number through the electronic media ( ) 
3 Download any available program to you on the internet ( ) 
4 React angrily to cyber bullying you may be exposed to on the ( ) 
internet. 
5 Delete all messages of threat on networking sites or e-mail ( ) 


The third question: everyday situations: 
(1) Someone subscribed to one of social networking sites. Whenever he contacted a member 


or tried to conduct an immediate conversation, he noticed that no one responded. What 
happened is considered a form of....... ....... ANGI SCALLET c.cavcuvaweconernies What can youdo 
to face this behavior? ccscccnceesneancanesd 


(2) You subscribed to one of social networking sites and you were surprised that someone was 
sarcastically speaking about Egypt and talking inappropriately about its figures. 
-Select four positive actions by which you can respond to him: 


